ocr: btnPrint Properties fe D H l ovisible True VClick Sub Clicko Set Reports DefaultCondition to current Record Application.SetCursor( 1 ) IF NOT ISNULLI CIGCUNTACTID.Value ) THEN rptContact.Deraultcondition = CONTACTID=" & CIGCUNTALTID.Value tptComtact.dpenitewriew ELSE MSGBOXI "No Contact Record is Avallable to Print!", 48, Application.Label ) END IF